(make-frame): Call custom-initialize-frame

only if cus-face is loaded.

diff --git a/lisp/frame.el b/lisp/frame.el
index 1396aa117857d653877785193dff0b870e42e97f..ddd565602b5b3fd5e97da2813108cf279e5b1666 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -458,7 +458,8 @@ on `after-make-frame-functions' are run with one arg, the newly created frame."
   (interactive)
   (run-hooks 'before-make-frame-hook)
   (let ((frame (funcall frame-creation-function parameters)))
-    (custom-initialize-frame frame)
+    (if (featurep 'cus-face)
+       (custom-initialize-frame frame))
     (run-hook-with-args 'after-make-frame-functions frame)
     frame))